# name : Rmd template
# key : rmd.template.
# key : rmd.tmpl.
# contributor: Shuguang
# expand-env: ((yas-indent-line 'fixed) (yas-wrap-around-region 'nil))
# --
---
title: "${1:title}"
author: "Shuguang Sun"
date: "\`r Sys.Date()\`"
output:
  pdf_document:
    latex_engine: xelatex
    keep_tex: true
    toc: true
    number_sections: true
  word_document:
    toc: TRUE
    fig_caption: true
---

\`\`\`{r setup, echo = FALSE, message=FALSE, warning=FALSE, include=FALSE}
## knitr::opts_chunk$set(echo = TRUE)
knitr::opts_chunk$set(comment=NA, fig.height=8, fig.width=7, fig.align='center')
## other setup, for example, libraries

library(haven)
library(dplyr)

## set seed; 2147483647 is .Machine$integer.max
set.seed(`(format "%d" (random 2147483647))`)

\`\`\`

$0
## R Markdown ##

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see <http://rmarkdown.rstudio.com>.

When you click the **Knit** button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

\`\`\`{r cars}
summary(cars)
\`\`\`

## Including Plots

You can also embed plots, for example:

\`\`\`{r pressure, echo=FALSE}
plot(pressure)
\`\`\`

Note that the \`echo = FALSE\` parameter was added to the code chunk to prevent printing of the R code that generated the plot.
